#tag Window
Begin Window RMMetaWin
   BackColor       =   16777215
   Backdrop        =   ""
   CloseButton     =   True
   Composite       =   True
   Frame           =   0
   FullScreen      =   False
   HasBackColor    =   False
   Height          =   500
   ImplicitInstance=   True
   LiveResize      =   False
   MacProcID       =   0
   MaxHeight       =   32000
   MaximizeButton  =   False
   MaxWidth        =   32000
   MenuBar         =   ""
   MenuBarVisible  =   True
   MinHeight       =   64
   MinimizeButton  =   False
   MinWidth        =   64
   Placement       =   0
   Resizeable      =   False
   Title           =   "Properties"
   Visible         =   True
   Width           =   600
   Begin TabPanel TabPanel1
      AutoDeactivate  =   True
      Bold            =   ""
      Enabled         =   True
      Height          =   446
      HelpTag         =   ""
      Index           =   -2147483648
      InitialParent   =   ""
      Italic          =   ""
      Left            =   11
      LockBottom      =   ""
      LockedInPosition=   False
      LockLeft        =   True
      LockRight       =   ""
      LockTop         =   True
      Panels          =   ""
      Scope           =   0
      SmallTabs       =   ""
      TabDefinition   =   "Metadata\rStyle\rMemo\rFile Paths"
      TabIndex        =   0
      TabPanelIndex   =   0
      TabStop         =   True
      TextFont        =   "System"
      TextSize        =   11
      TextUnit        =   0
      Top             =   0
      Underline       =   ""
      Value           =   0
      Visible         =   True
      Width           =   578
      Begin TextArea memoText
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   401
         HelpTag         =   ""
         HideSelection   =   True
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Multiline       =   True
         ReadOnly        =   ""
         Scope           =   0
         ScrollbarHorizontal=   ""
         ScrollbarVertical=   True
         Styled          =   True
         TabIndex        =   0
         TabPanelIndex   =   3
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   30
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   538
      End
      Begin Listbox StyleList
         AutoDeactivate  =   True
         AutoHideScrollbars=   True
         Bold            =   ""
         Border          =   True
         ColumnCount     =   2
         ColumnsResizable=   ""
         ColumnWidths    =   "20%,80%"
         DataField       =   ""
         DataSource      =   ""
         DefaultRowHeight=   -1
         Enabled         =   True
         EnableDrag      =   ""
         EnableDragReorder=   ""
         GridLinesHorizontal=   0
         GridLinesVertical=   0
         HasHeading      =   ""
         HeadingIndex    =   -1
         Height          =   382
         HelpTag         =   ""
         Hierarchical    =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         InitialValue    =   ""
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         RequiresSelection=   ""
         Scope           =   0
         ScrollbarHorizontal=   ""
         ScrollBarVertical=   True
         SelectionType   =   0
         TabIndex        =   0
         TabPanelIndex   =   2
         TabStop         =   True
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   50
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   270
         _ScrollWidth    =   -1
      End
      Begin StaticText GenreLanguageText
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   1
         TabPanelIndex   =   2
         Text            =   "Genre and Language:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   27
         Underline       =   ""
         Visible         =   True
         Width           =   240
      End
      Begin Listbox TechStyleList
         AutoDeactivate  =   True
         AutoHideScrollbars=   True
         Bold            =   ""
         Border          =   True
         ColumnCount     =   1
         ColumnsResizable=   ""
         ColumnWidths    =   "20%,80%"
         DataField       =   ""
         DataSource      =   ""
         DefaultRowHeight=   -1
         Enabled         =   True
         EnableDrag      =   ""
         EnableDragReorder=   ""
         GridLinesHorizontal=   0
         GridLinesVertical=   0
         HasHeading      =   ""
         HeadingIndex    =   -1
         Height          =   382
         HelpTag         =   ""
         Hierarchical    =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         InitialValue    =   ""
         Italic          =   ""
         Left            =   304
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         RequiresSelection=   ""
         Scope           =   0
         ScrollbarHorizontal=   ""
         ScrollBarVertical=   True
         SelectionType   =   0
         TabIndex        =   2
         TabPanelIndex   =   2
         TabStop         =   True
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   50
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   270
         _ScrollWidth    =   -1
      End
      Begin StaticText TechStyleText
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   311
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   3
         TabPanelIndex   =   2
         Text            =   "Technical Style:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   27
         Underline       =   ""
         Visible         =   True
         Width           =   240
      End
      Begin StaticText MData2Text
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   0
         TabPanelIndex   =   1
         Text            =   "Record Code:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   63
         Underline       =   ""
         Visible         =   True
         Width           =   100
      End
      Begin StaticText MData3Text
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   1
         TabPanelIndex   =   1
         Text            =   "ISRC Code:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   85
         Underline       =   ""
         Visible         =   True
         Width           =   100
      End
      Begin StaticText MData4Text
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   2
         TabPanelIndex   =   1
         Text            =   "Publisher:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   107
         Underline       =   ""
         Visible         =   True
         Width           =   100
      End
      Begin StaticText MData5Text
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   3
         TabPanelIndex   =   1
         Text            =   "Country:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   129
         Underline       =   ""
         Visible         =   True
         Width           =   100
      End
      Begin StaticText MData7Text
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   4
         TabPanelIndex   =   1
         Text            =   "Album Name:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   173
         Underline       =   ""
         Visible         =   True
         Width           =   100
      End
      Begin StaticText MData8Text
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   5
         TabPanelIndex   =   1
         Text            =   "Track Name:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   195
         Underline       =   ""
         Visible         =   True
         Width           =   100
      End
      Begin StaticText MData9Text
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   6
         TabPanelIndex   =   1
         Text            =   "Performer:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   217
         Underline       =   ""
         Visible         =   True
         Width           =   100
      End
      Begin StaticText MData11Text
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   7
         TabPanelIndex   =   1
         Text            =   "Soloist:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   261
         Underline       =   ""
         Visible         =   True
         Width           =   100
      End
      Begin StaticText MData12Text
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   8
         TabPanelIndex   =   1
         Text            =   "Solo Instrument:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   283
         Underline       =   ""
         Visible         =   True
         Width           =   120
      End
      Begin StaticText MData13Text
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   9
         TabPanelIndex   =   1
         Text            =   "Composer(s):"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   305
         Underline       =   ""
         Visible         =   True
         Width           =   100
      End
      Begin StaticText MData14Text
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   10
         TabPanelIndex   =   1
         Text            =   "Lyricist(s):"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   327
         Underline       =   ""
         Visible         =   True
         Width           =   100
      End
      Begin StaticText MData15Text
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   11
         TabPanelIndex   =   1
         Text            =   "Arranger(s):"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   349
         Underline       =   ""
         Visible         =   True
         Width           =   100
      End
      Begin StaticText MData16Text
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   12
         TabPanelIndex   =   1
         Text            =   "Author(s):"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   371
         Underline       =   ""
         Visible         =   True
         Width           =   100
      End
      Begin StaticText MData17Text
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   13
         TabPanelIndex   =   1
         Text            =   "Duration:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   393
         Underline       =   ""
         Visible         =   True
         Width           =   100
      End
      Begin StaticText OrigPathText
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   1
         TabPanelIndex   =   4
         Text            =   "Original version:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   52
         Underline       =   ""
         Visible         =   True
         Width           =   114
      End
      Begin StaticText CopyPathText
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   2
         TabPanelIndex   =   4
         Text            =   "Listening Copy:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   74
         Underline       =   ""
         Visible         =   True
         Width           =   114
      End
      Begin StaticText CoverArtText
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   3
         TabPanelIndex   =   4
         Text            =   "Cover Art:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   141
         Underline       =   ""
         Visible         =   True
         Width           =   100
      End
      Begin ImageWell ImageWell1
         AutoDeactivate  =   True
         Enabled         =   True
         Height          =   240
         HelpTag         =   ""
         Image           =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Scope           =   0
         TabIndex        =   4
         TabPanelIndex   =   4
         TabStop         =   True
         Top             =   165
         Visible         =   True
         Width           =   240
      End
      Begin TextField TF
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   0
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Password        =   ""
         ReadOnly        =   ""
         Scope           =   0
         TabIndex        =   1
         TabPanelIndex   =   1
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   63
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   400
      End
      Begin TextField TF
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   1
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Password        =   ""
         ReadOnly        =   ""
         Scope           =   0
         TabIndex        =   2
         TabPanelIndex   =   1
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   85
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   400
      End
      Begin TextField TF
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   2
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Password        =   ""
         ReadOnly        =   ""
         Scope           =   0
         TabIndex        =   3
         TabPanelIndex   =   1
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   107
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   400
      End
      Begin TextField TF
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   3
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   2
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Password        =   ""
         ReadOnly        =   ""
         Scope           =   0
         TabIndex        =   4
         TabPanelIndex   =   1
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   129
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   400
      End
      Begin TextField TF
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   5
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Password        =   ""
         ReadOnly        =   ""
         Scope           =   0
         TabIndex        =   6
         TabPanelIndex   =   1
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   173
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   400
      End
      Begin TextField TF
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   6
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Password        =   ""
         ReadOnly        =   ""
         Scope           =   0
         TabIndex        =   7
         TabPanelIndex   =   1
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   195
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   400
      End
      Begin TextField TF
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   7
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Password        =   ""
         ReadOnly        =   ""
         Scope           =   0
         TabIndex        =   8
         TabPanelIndex   =   1
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   217
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   400
      End
      Begin TextField TF
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   9
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Password        =   ""
         ReadOnly        =   ""
         Scope           =   0
         TabIndex        =   10
         TabPanelIndex   =   1
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   261
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   400
      End
      Begin TextField TF
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   10
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Password        =   ""
         ReadOnly        =   ""
         Scope           =   0
         TabIndex        =   11
         TabPanelIndex   =   1
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   283
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   400
      End
      Begin TextField TF
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   11
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Password        =   ""
         ReadOnly        =   ""
         Scope           =   0
         TabIndex        =   12
         TabPanelIndex   =   1
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   305
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   400
      End
      Begin TextField TF
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   12
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Password        =   ""
         ReadOnly        =   ""
         Scope           =   0
         TabIndex        =   13
         TabPanelIndex   =   1
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   327
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   400
      End
      Begin TextField TF
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   13
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Password        =   ""
         ReadOnly        =   ""
         Scope           =   0
         TabIndex        =   14
         TabPanelIndex   =   1
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   349
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   400
      End
      Begin TextField TF
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   14
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Password        =   ""
         ReadOnly        =   ""
         Scope           =   0
         TabIndex        =   15
         TabPanelIndex   =   1
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   371
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   400
      End
      Begin TextField TF
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   15
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   "##:##:##"
         Password        =   ""
         ReadOnly        =   ""
         Scope           =   0
         TabIndex        =   16
         TabPanelIndex   =   1
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   393
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   400
      End
      Begin TextField hirespath
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Password        =   ""
         ReadOnly        =   True
         Scope           =   0
         TabIndex        =   7
         TabPanelIndex   =   4
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   52
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   333
      End
      Begin TextField lorespath
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Password        =   ""
         ReadOnly        =   True
         Scope           =   0
         TabIndex        =   8
         TabPanelIndex   =   4
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   74
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   333
      End
      Begin BevelButton IMG1Acquire
         AcceptFocus     =   False
         AutoDeactivate  =   True
         BackColor       =   0
         Bevel           =   0
         Bold            =   False
         ButtonType      =   0
         Caption         =   "Scan"
         CaptionAlign    =   3
         CaptionDelta    =   0
         CaptionPlacement=   1
         Enabled         =   True
         HasBackColor    =   False
         HasMenu         =   0
         Height          =   22
         HelpTag         =   ""
         Icon            =   ""
         IconAlign       =   0
         IconDX          =   0
         IconDY          =   0
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   False
         Left            =   211
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         MenuValue       =   0
         Scope           =   0
         TabIndex        =   9
         TabPanelIndex   =   4
         TabStop         =   True
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   ""
         TextUnit        =   0
         Top             =   409
         Underline       =   False
         Value           =   False
         Visible         =   True
         Width           =   60
      End
      Begin BevelButton IMG2Acquire
         AcceptFocus     =   False
         AutoDeactivate  =   True
         BackColor       =   0
         Bevel           =   0
         Bold            =   False
         ButtonType      =   0
         Caption         =   "Scan"
         CaptionAlign    =   3
         CaptionDelta    =   0
         CaptionPlacement=   1
         Enabled         =   True
         HasBackColor    =   False
         HasMenu         =   0
         Height          =   22
         HelpTag         =   ""
         Icon            =   ""
         IconAlign       =   0
         IconDX          =   0
         IconDY          =   0
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   False
         Left            =   463
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         MenuValue       =   0
         Scope           =   0
         TabIndex        =   10
         TabPanelIndex   =   4
         TabStop         =   True
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   ""
         TextUnit        =   0
         Top             =   409
         Underline       =   False
         Value           =   False
         Visible         =   True
         Width           =   60
      End
      Begin BevelButton BrowseDigVersion
         AcceptFocus     =   False
         AutoDeactivate  =   True
         BackColor       =   0
         Bevel           =   0
         Bold            =   False
         ButtonType      =   0
         Caption         =   "..."
         CaptionAlign    =   3
         CaptionDelta    =   0
         CaptionPlacement=   1
         Enabled         =   True
         HasBackColor    =   False
         HasMenu         =   0
         Height          =   22
         HelpTag         =   ""
         Icon            =   ""
         IconAlign       =   0
         IconDX          =   0
         IconDY          =   0
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   False
         Left            =   493
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         MenuValue       =   0
         Scope           =   0
         TabIndex        =   11
         TabPanelIndex   =   4
         TabStop         =   True
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   ""
         TextUnit        =   0
         Top             =   52
         Underline       =   False
         Value           =   False
         Visible         =   True
         Width           =   30
      End
      Begin BevelButton BrowseListenVersion
         AcceptFocus     =   False
         AutoDeactivate  =   True
         BackColor       =   0
         Bevel           =   0
         Bold            =   False
         ButtonType      =   0
         Caption         =   "..."
         CaptionAlign    =   3
         CaptionDelta    =   0
         CaptionPlacement=   1
         Enabled         =   True
         HasBackColor    =   False
         HasMenu         =   0
         Height          =   22
         HelpTag         =   ""
         Icon            =   ""
         IconAlign       =   0
         IconDX          =   0
         IconDY          =   0
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   False
         Left            =   493
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         MenuValue       =   0
         Scope           =   0
         TabIndex        =   12
         TabPanelIndex   =   4
         TabStop         =   True
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   ""
         TextUnit        =   0
         Top             =   74
         Underline       =   False
         Value           =   False
         Visible         =   True
         Width           =   30
      End
      Begin StaticText MData6Text
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   28
         TabPanelIndex   =   1
         Text            =   "Year:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   151
         Underline       =   ""
         Visible         =   True
         Width           =   100
      End
      Begin TextField TF
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   4
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   4
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   "####"
         Password        =   ""
         ReadOnly        =   ""
         Scope           =   0
         TabIndex        =   5
         TabPanelIndex   =   1
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   151
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   400
      End
      Begin StaticText MData1Text
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   29
         TabPanelIndex   =   1
         Text            =   "Catalog:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   39
         Underline       =   ""
         Visible         =   True
         Width           =   100
      End
      Begin StaticText MData10Text
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   30
         TabPanelIndex   =   1
         Text            =   "Conductor:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   239
         Underline       =   ""
         Visible         =   True
         Width           =   100
      End
      Begin TextField TF
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   8
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Password        =   ""
         ReadOnly        =   ""
         Scope           =   0
         TabIndex        =   9
         TabPanelIndex   =   1
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   239
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   400
      End
      Begin StaticText MData18Text
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   31
         TabPanelIndex   =   1
         Text            =   "Library Shelf Code:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   415
         Underline       =   ""
         Visible         =   True
         Width           =   100
      End
      Begin TextField TF
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   16
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Password        =   ""
         ReadOnly        =   ""
         Scope           =   0
         TabIndex        =   17
         TabPanelIndex   =   1
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   415
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   400
      End
      Begin PopupMenu ValikoimaPM
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   22
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         InitialValue    =   ""
         Italic          =   ""
         Left            =   151
         ListIndex       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Scope           =   0
         TabIndex        =   32
         TabPanelIndex   =   1
         TabStop         =   True
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   37
         Underline       =   ""
         Visible         =   True
         Width           =   400
      End
      Begin StaticText AttachmentPathText
         AutoDeactivate  =   True
         Bold            =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Height          =   20
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   31
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Multiline       =   ""
         Scope           =   0
         TabIndex        =   13
         TabPanelIndex   =   4
         Text            =   "Attachment:"
         TextAlign       =   0
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   10
         TextUnit        =   0
         Top             =   96
         Underline       =   ""
         Visible         =   True
         Width           =   114
      End
      Begin TextField docpath
         AcceptTabs      =   ""
         Alignment       =   0
         AutoDeactivate  =   True
         BackColor       =   16777215
         Bold            =   ""
         Border          =   True
         CueText         =   ""
         DataField       =   ""
         DataSource      =   ""
         Enabled         =   True
         Format          =   ""
         Height          =   22
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LimitText       =   0
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Mask            =   ""
         Password        =   ""
         ReadOnly        =   True
         Scope           =   0
         TabIndex        =   14
         TabPanelIndex   =   4
         TabStop         =   True
         Text            =   ""
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   95
         Underline       =   ""
         UseFocusRing    =   True
         Visible         =   True
         Width           =   333
      End
      Begin BevelButton BrowseAttachment
         AcceptFocus     =   False
         AutoDeactivate  =   True
         BackColor       =   0
         Bevel           =   0
         Bold            =   False
         ButtonType      =   0
         Caption         =   "..."
         CaptionAlign    =   3
         CaptionDelta    =   0
         CaptionPlacement=   1
         Enabled         =   True
         HasBackColor    =   False
         HasMenu         =   0
         Height          =   22
         HelpTag         =   ""
         Icon            =   ""
         IconAlign       =   0
         IconDX          =   0
         IconDY          =   0
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   False
         Left            =   493
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         MenuValue       =   0
         Scope           =   0
         TabIndex        =   15
         TabPanelIndex   =   4
         TabStop         =   True
         TextColor       =   0
         TextFont        =   "System"
         TextSize        =   ""
         TextUnit        =   0
         Top             =   96
         Underline       =   False
         Value           =   False
         Visible         =   True
         Width           =   30
      End
      Begin BevelButton IMG1Rotate
         AcceptFocus     =   False
         AutoDeactivate  =   True
         BackColor       =   "&c000000"
         Bevel           =   0
         Bold            =   False
         ButtonType      =   0
         Caption         =   "Rotate"
         CaptionAlign    =   3
         CaptionDelta    =   0
         CaptionPlacement=   1
         Enabled         =   True
         HasBackColor    =   False
         HasMenu         =   0
         Height          =   22
         HelpTag         =   ""
         Icon            =   ""
         IconAlign       =   0
         IconDX          =   0
         IconDY          =   0
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   False
         Left            =   91
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         MenuValue       =   0
         Scope           =   0
         TabIndex        =   17
         TabPanelIndex   =   4
         TabStop         =   True
         TextColor       =   "&c000000"
         TextFont        =   "System"
         TextSize        =   ""
         TextUnit        =   0
         Top             =   409
         Underline       =   False
         Value           =   False
         Visible         =   True
         Width           =   60
      End
      Begin BevelButton IMG2Rotate
         AcceptFocus     =   False
         AutoDeactivate  =   True
         BackColor       =   "&c000000"
         Bevel           =   0
         Bold            =   False
         ButtonType      =   0
         Caption         =   "Rotate"
         CaptionAlign    =   3
         CaptionDelta    =   0
         CaptionPlacement=   1
         Enabled         =   True
         HasBackColor    =   False
         HasMenu         =   0
         Height          =   22
         HelpTag         =   ""
         Icon            =   ""
         IconAlign       =   0
         IconDX          =   0
         IconDY          =   0
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   False
         Left            =   343
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         MenuValue       =   0
         Scope           =   0
         TabIndex        =   19
         TabPanelIndex   =   4
         TabStop         =   True
         TextColor       =   "&c000000"
         TextFont        =   "System"
         TextSize        =   ""
         TextUnit        =   0
         Top             =   409
         Underline       =   False
         Value           =   False
         Visible         =   True
         Width           =   60
      End
      Begin PushButton IMG1Despeckle
         AutoDeactivate  =   True
         Bold            =   ""
         Cancel          =   ""
         Caption         =   "Despeckle"
         Default         =   ""
         Enabled         =   True
         Height          =   22
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   151
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Scope           =   0
         TabIndex        =   21
         TabPanelIndex   =   4
         TabStop         =   True
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   409
         Underline       =   ""
         Visible         =   True
         Width           =   60
      End
      Begin ImageWell ImageWell2
         AutoDeactivate  =   True
         Enabled         =   True
         Height          =   240
         HelpTag         =   ""
         Image           =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Left            =   283
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Scope           =   0
         TabIndex        =   22
         TabPanelIndex   =   4
         TabStop         =   True
         Top             =   165
         Visible         =   True
         Width           =   240
      End
      Begin PushButton IMG2Despeckle
         AutoDeactivate  =   True
         Bold            =   ""
         Cancel          =   ""
         Caption         =   "Despeckle"
         Default         =   ""
         Enabled         =   True
         Height          =   22
         HelpTag         =   ""
         Index           =   -2147483648
         InitialParent   =   "TabPanel1"
         Italic          =   ""
         Left            =   403
         LockBottom      =   ""
         LockedInPosition=   False
         LockLeft        =   True
         LockRight       =   ""
         LockTop         =   True
         Scope           =   0
         TabIndex        =   23
         TabPanelIndex   =   4
         TabStop         =   True
         TextFont        =   "System"
         TextSize        =   0
         TextUnit        =   0
         Top             =   409
         Underline       =   ""
         Visible         =   True
         Width           =   60
      End
   End
   Begin BevelButton CancelButton
      AcceptFocus     =   ""
      AutoDeactivate  =   True
      BackColor       =   0
      Bevel           =   0
      Bold            =   False
      ButtonType      =   0
      Caption         =   "Cancel"
      CaptionAlign    =   3
      CaptionDelta    =   0
      CaptionPlacement=   0
      Enabled         =   True
      HasBackColor    =   ""
      HasMenu         =   0
      Height          =   22
      HelpTag         =   ""
      Icon            =   ""
      IconAlign       =   0
      IconDX          =   0
      IconDY          =   0
      Index           =   -2147483648
      InitialParent   =   ""
      Italic          =   False
      Left            =   463
      LockBottom      =   ""
      LockedInPosition=   False
      LockLeft        =   True
      LockRight       =   ""
      LockTop         =   True
      MenuValue       =   0
      Scope           =   0
      TabIndex        =   1
      TabPanelIndex   =   0
      TabStop         =   True
      TextColor       =   0
      TextFont        =   "System"
      TextSize        =   ""
      TextUnit        =   0
      Top             =   458
      Underline       =   False
      Value           =   ""
      Visible         =   True
      Width           =   60
   End
   Begin BevelButton tcButton
      AcceptFocus     =   False
      AutoDeactivate  =   True
      BackColor       =   0
      Bevel           =   0
      Bold            =   False
      ButtonType      =   0
      Caption         =   "Tc"
      CaptionAlign    =   3
      CaptionDelta    =   0
      CaptionPlacement=   1
      Enabled         =   True
      HasBackColor    =   False
      HasMenu         =   0
      Height          =   22
      HelpTag         =   ""
      Icon            =   ""
      IconAlign       =   0
      IconDX          =   0
      IconDY          =   0
      Index           =   -2147483648
      InitialParent   =   ""
      Italic          =   False
      Left            =   20
      LockBottom      =   ""
      LockedInPosition=   False
      LockLeft        =   True
      LockRight       =   ""
      LockTop         =   True
      MenuValue       =   0
      Scope           =   0
      TabIndex        =   3
      TabPanelIndex   =   0
      TabStop         =   True
      TextColor       =   0
      TextFont        =   "System"
      TextSize        =   ""
      TextUnit        =   0
      Top             =   458
      Underline       =   False
      Value           =   False
      Visible         =   True
      Width           =   30
   End
   Begin BevelButton ucButton
      AcceptFocus     =   False
      AutoDeactivate  =   True
      BackColor       =   0
      Bevel           =   0
      Bold            =   False
      ButtonType      =   0
      Caption         =   "Uc"
      CaptionAlign    =   3
      CaptionDelta    =   0
      CaptionPlacement=   1
      Enabled         =   True
      HasBackColor    =   False
      HasMenu         =   0
      Height          =   22
      HelpTag         =   ""
      Icon            =   ""
      IconAlign       =   0
      IconDX          =   0
      IconDY          =   0
      Index           =   -2147483648
      InitialParent   =   ""
      Italic          =   False
      Left            =   56
      LockBottom      =   ""
      LockedInPosition=   False
      LockLeft        =   True
      LockRight       =   ""
      LockTop         =   True
      MenuValue       =   0
      Scope           =   0
      TabIndex        =   2
      TabPanelIndex   =   0
      TabStop         =   True
      TextColor       =   0
      TextFont        =   "System"
      TextSize        =   ""
      TextUnit        =   0
      Top             =   458
      Underline       =   False
      Value           =   False
      Visible         =   True
      Width           =   30
   End
   Begin BevelButton ApplyButton
      AcceptFocus     =   False
      AutoDeactivate  =   True
      BackColor       =   0
      Bevel           =   0
      Bold            =   False
      ButtonType      =   0
      Caption         =   "Save"
      CaptionAlign    =   3
      CaptionDelta    =   0
      CaptionPlacement=   1
      Enabled         =   True
      HasBackColor    =   False
      HasMenu         =   0
      Height          =   22
      HelpTag         =   ""
      Icon            =   ""
      IconAlign       =   0
      IconDX          =   0
      IconDY          =   0
      Index           =   -2147483648
      InitialParent   =   ""
      Italic          =   False
      Left            =   529
      LockBottom      =   ""
      LockedInPosition=   False
      LockLeft        =   True
      LockRight       =   ""
      LockTop         =   True
      MenuValue       =   0
      Scope           =   0
      TabIndex        =   0
      TabPanelIndex   =   0
      TabStop         =   True
      TextColor       =   0
      TextFont        =   "System"
      TextSize        =   ""
      TextUnit        =   0
      Top             =   458
      Underline       =   False
      Value           =   False
      Visible         =   True
      Width           =   60
   End
End
#tag EndWindow

#tag WindowCode
	#tag Event
		Sub Open()
		  me.left=SCREEN(0).WIDTH/2-me.width/2
		  me.top=100
		  
		  if app.IsAdmin then
		    SaveOnExit=true
		  else
		    SaveOnExit=false
		  end
		  
		  for i as integer=0 to 16
		    tf(i).Enabled=app.IsAdmin
		  next
		  
		  SetView
		  
		  app.lang.LoadCaptions(self)
		End Sub
	#tag EndEvent


	#tag Method, Flags = &h0
		Function GetStyleString() As string
		  dim s as string
		  dim b(11) as string
		  dim i as integer
		  
		  if StyleList.Listcount>46 then
		    
		    for i=7 downto 4
		      
		      b(0)="&b"
		      
		      if StyleList.CellState(i,0)=CheckBox.CheckedStates.Checked then
		        b(0)=b(0)+"1"
		      else
		        b(0)=b(0)+"0"
		      end
		      
		    next
		    
		    for i=3 downto 0
		      
		      b(1)="&b"
		      
		      if StyleList.CellState(i,0)=CheckBox.CheckedStates.Checked then
		        b(1)=b(1)+"1"
		      else
		        b(1)=b(1)+"0"
		      end
		      
		    next
		    
		    for i=15 downto 12
		      
		      b(2)="&b"
		      
		      if StyleList.CellState(i,0)=CheckBox.CheckedStates.Checked then
		        b(2)=b(2)+"1"
		      else
		        b(2)=b(2)+"0"
		      end
		      
		    next
		    
		    for i=11 downto 8
		      
		      b(3)="&b"
		      
		      if StyleList.CellState(i,0)=CheckBox.CheckedStates.Checked then
		        b(3)=b(3)+"1"
		      else
		        b(3)=b(3)+"0"
		      end
		      
		    next
		    
		    for i=23 downto 20
		      
		      b(4)="&b"
		      
		      if StyleList.CellState(i,0)=CheckBox.CheckedStates.Checked then
		        b(4)=b(4)+"1"
		      else
		        b(4)=b(4)+"0"
		      end
		      
		    next
		    
		    for i=19 downto 16
		      
		      b(5)="&b"
		      
		      if StyleList.CellState(i,0)=CheckBox.CheckedStates.Checked then
		        b(5)=b(5)+"1"
		      else
		        b(5)=b(5)+"0"
		      end
		      
		    next
		    
		    for i=31 downto 28
		      
		      b(6)="&b"
		      
		      if StyleList.CellState(i,0)=CheckBox.CheckedStates.Checked then
		        b(6)=b(6)+"1"
		      else
		        b(6)=b(6)+"0"
		      end
		      
		    next
		    
		    for i=27 downto 24
		      
		      b(7)="&b"
		      
		      if StyleList.CellState(i,0)=CheckBox.CheckedStates.Checked then
		        b(7)=b(7)+"1"
		      else
		        b(7)=b(7)+"0"
		      end
		      
		    next
		    
		    for i=39 downto 36
		      
		      b(8)="&b"
		      
		      if StyleList.CellState(i,0)=CheckBox.CheckedStates.Checked then
		        b(8)=b(8)+"1"
		      else
		        b(8)=b(8)+"0"
		      end
		      
		    next
		    
		    for i=35 downto 32
		      
		      b(9)="&b"
		      
		      if StyleList.CellState(i,0)=CheckBox.CheckedStates.Checked then
		        b(9)=b(9)+"1"
		      else
		        b(9)=b(9)+"0"
		      end
		      
		    next
		    
		    for i=47 downto 44
		      
		      b(10)="&b"
		      
		      if StyleList.CellState(i,0)=CheckBox.CheckedStates.Checked then
		        b(10)=b(10)+"1"
		      else
		        b(10)=b(10)+"0"
		      end
		      
		    next
		    
		    for i=43 downto 40
		      
		      b(11)="&b"
		      
		      if StyleList.CellState(i,0)=CheckBox.CheckedStates.Checked then
		        b(11)=b(11)+"1"
		      else
		        b(11)=b(11)+"0"
		      end
		      
		    next
		    
		  else
		    
		    return "000000000000"
		    
		  end
		  
		  MsgBox b(0)+EndOfLine+b(1)+EndOfLine+b(2)+EndOfLine+b(3)
		  
		  s=hex(b(0))+hex(b(1))+hex(b(2))+hex(b(3))+hex(b(4))+hex(b(5))+hex(b(6))+hex(b(7))+hex(b(8))+hex(b(9))+hex(b(10))+hex(b(11))
		  
		  return s
		  
		  // 
		  
		  'dim i as integer
		  'dim b(3) as string
		  '
		  'b(0)="&b"+mid(binvalue.text,8,1)+mid(binvalue.text,7,1)+mid(binvalue.text,6,1)+mid(binvalue.text,5,1)
		  'b(1)="&b"+mid(binvalue.text,4,1)+mid(binvalue.text,3,1)+mid(binvalue.text,2,1)+mid(binvalue.text,1,1)
		  '
		  'b(3)="&b"+mid(binvalue.text,12,1)+mid(binvalue.text,11,1)+mid(binvalue.text,10,1)+mid(binvalue.text,9,1)
		  '
		  'hexString.text=hex(b(0))+hex(b(1))+hex(b(2))+hex(b(3))
		End Function
	#tag EndMethod

	#tag Method, Flags = &h0
		Sub SetStyleValues()
		  if MySong<>nil then
		    
		    dim bvalue as string
		    dim ivalue as UInt16
		    dim i1,i2 as integer
		    
		    for i1=0 to 11 step 2
		      
		      ivalue=val("&h"+mid(MySong.GENRESET,i1,2))
		      
		      bvalue=bin(ivalue)
		      
		      bvalue=FixedLen(bvalue,4)
		      
		      for i2=1 to len(bvalue)
		        
		        if mid(bvalue,i2,1)="1" then
		          StyleList.CellState(i2-1,0)=Checkbox.CheckedStates.Checked
		        else
		          StyleList.CellState(i2-1,0)=Checkbox.CheckedStates.Unchecked
		        end
		        
		      next
		    next
		    
		  end
		  
		  
		End Sub
	#tag EndMethod

	#tag Method, Flags = &h0
		Sub SetView()
		  
		  if MySong<>nil then
		    
		    ValikoimaPM.listindex=MySong.CATEGORYID
		    
		    tf(0).text=MySong.RECORDCODE
		    tf(1).text=MySong.ISRCCODE
		    tf(2).text=MySong.PUBLISHER
		    tf(3).text=MySong.COUNTRY
		    tf(4).text=MySong.YEAR
		    tf(5).text=MySong.ALBUMNAME
		    tf(6).text=MySong.TRACKNAME
		    tf(7).text=MySong.PERFORMER
		    tf(8).text=MySong.CONDUCTOR
		    tf(9).text=MySong.SOLOIST
		    tf(10).text=MySong.SOLOINSTRUMENT
		    tf(11).text=MySong.COMPOSERS
		    tf(12).text=MySong.LYRICIST
		    tf(13).text=MySong.ARRANGER
		    tf(14).text=MySong.AUTHORS
		    tf(15).text=MySong.DURATION
		    tf(16).text=MySong.SHELFCODE
		    
		    memotext.text=MySong.MEMO
		    
		    hirespath.text=MySong.HIRESPATH
		    lorespath.text=MySong.LORESPATH
		    docpath.text=MySong.DOCPATH
		    
		    dim rs as recordset
		    
		    if mydb<>nil then
		      
		      if mysong<>nil then
		        rs=mydb.sqlselect("SELECT * FROM "+app.mprefs.getstring("DBSCHEMA")+".genreset WHERE catid="+str(MySong.CATEGORYID))
		      else
		        MsgBox "error: song is nil"
		      end
		      
		      if rs<>nil then
		        while not rs.eof
		          
		          stylelist.addrow ""
		          stylelist.Cell(stylelist.LastIndex,1)=DefineEncoding(rs.field("value").stringvalue,Encodings.UTF8)
		          
		          rs.movenext
		          
		        wend
		      end
		      
		      
		    end
		    
		    'SetStyleValues
		    
		  end
		End Sub
	#tag EndMethod


	#tag Property, Flags = &h0
		IsUpdated As BOolean
	#tag EndProperty

	#tag Property, Flags = &h0
		MySong As MusicDataObject
	#tag EndProperty

	#tag Property, Flags = &h0
		p As IKPictureTakerMBS
	#tag EndProperty

	#tag Property, Flags = &h0
		SaveBackToImportWin As Boolean
	#tag EndProperty

	#tag Property, Flags = &h0
		SaveBackToMainWin As Boolean
	#tag EndProperty

	#tag Property, Flags = &h0
		SaveOnExit As Boolean
	#tag EndProperty


#tag EndWindowCode

#tag Events TabPanel1
	#tag Event
		Sub Change()
		  if me.value=0 then
		    tcButton.enabled=true
		    ucButton.enabled=true
		  else
		    tcButton.enabled=false
		    ucButton.enabled=false
		  end
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events memoText
	#tag Event
		Sub TextChange()
		  if MySong<>nil then MySong.MEMO=me.text
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events StyleList
	#tag Event
		Sub Open()
		  me.columncount=2
		  me.ColumnType(0)=2
		  me.ColumnType(1)=1
		  
		  me.columncount=2
		  me.ColumnType(0)=2
		  me.ColumnType(1)=1
		  
		  
		End Sub
	#tag EndEvent
	#tag Event
		Function KeyDown(Key As String) As Boolean
		  if key=chr(32) then 'space
		    if me.listindex>-1 then
		      me.CellCheck(me.listindex,0)=not(me.CellCheck(me.listindex,0))
		    end
		  end
		End Function
	#tag EndEvent
#tag EndEvents
#tag Events TechStyleList
	#tag Event
		Sub Open()
		  me.columncount=2
		  me.ColumnType(0)=2
		  me.ColumnType(1)=1
		  
		  dim rs as recordset
		  
		  if mydb<>nil then
		    
		    rs=mydb.sqlselect("SELECT * FROM "+app.mprefs.getstring("DBSCHEMA")+".styleset")
		    
		    if rs<>nil then
		      while not rs.eof
		        
		        me.addrow ""
		        me.Cell(me.LastIndex,1)=DefineEncoding(rs.field("value").stringvalue,Encodings.UTF8)
		        
		        rs.movenext
		      wend
		    end
		    
		    
		  end
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events ImageWell1
	#tag Event
		Sub Open()
		  me.acceptPictureDrop
		  me.AcceptFileDrop("imagetypes")
		End Sub
	#tag EndEvent
	#tag Event
		Sub DropObject(obj As DragItem, action As Integer)
		  if obj<>nil then
		    if obj.PictureAvailable then
		      
		      me.image=obj.picture
		      me.image=Imagewell2.Image.ScaleMBS(ImageWell2.width,ImageWell2.height,true)
		      
		    elseif obj.folderitemavailable then
		      
		      me.image=obj.folderitem.openaspicture
		      me.image=Imagewell2.Image.ScaleMBS(ImageWell2.width,ImageWell2.height,true)
		      
		    end if
		    
		  end
		  
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events TF
	#tag Event
		Sub TextChange(index as Integer)
		  dim d as new date
		  
		  MySong.ENTERED=d.SQLDateTime
		  
		  SELECT CASE index
		    
		  CASE 0
		    MySong.RECORDCODE=me.text
		  CASE 1
		    MySong.ISRCCODE=me.text
		  CASE 2
		    MySong.PUBLISHER=me.text
		  CASE 3
		    MySong.Country=me.text
		  CASE 4
		    MySong.YEAR=me.text
		  CASE 5
		    MySong.ALBUMNAME=me.text
		  CASE 6
		    MySong.TRACKNAME=me.text
		  CASE 7
		    MySong.PERFORMER=me.text
		  CASE 8
		    MySong.CONDUCTOR=me.text
		  CASE 9
		    MySong.SOLOIST=me.text
		  CASE 10
		    MySong.SOLOINSTRUMENT=me.text
		  CASE 11
		    MySong.COMPOSERS=me.text
		  CASE 12
		    MySong.LYRICIST=me.text
		  CASE 13
		    MySong.ARRANGER=me.text
		  CASE 14
		    MySong.AUTHORS=me.text
		  CASE 15
		    MySong.DURATION=me.text
		  CASE 16
		    MySong.SHELFCODE=me.text
		  END SELECT
		  
		  
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events IMG1Acquire
	#tag Event
		Sub Action()
		  #if TargetMachO then
		    
		    dim n as integer
		    
		    p=new IKPictureTakerMBS
		    
		    p.AllowsFileChoosing=false
		    p.AllowsEditing=true
		    p.AllowsVideoCapture=true
		    p.ShowEffects=FALSE // disable if you run modal!
		    p.ShowRecentPicture=true
		    p.UpdateRecentPicture=true
		    p.InformationalText="Please take a picture"
		    
		    n=p.runModal
		    
		    if n=1 then // ok
		      
		      Imagewell1.Image=p.outputImage.CopyPictureWithMask
		      
		    end if
		    
		  #elseif TargetWin32 then
		    
		    dim tw as new EZTwain
		    
		    if tw.SelectSource then
		      
		      do
		      loop until tw.AcquireNative
		      
		      if tw.pic<>nil then
		        
		        Imagewell1.Image=tw.pic
		        
		        do
		        loop until Imagewell1.ExportJPG
		        
		        Imagewell1.Image=Imagewell1.Image.ScaleMBS(ImageWell1.width,ImageWell1.height,true)
		        
		      end
		      
		    else
		      MsgBox tw.lastError
		    end
		    
		  #endif
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events IMG2Acquire
	#tag Event
		Sub Action()
		  #if TargetMachO then
		    
		    dim n as integer
		    
		    p=new IKPictureTakerMBS
		    
		    p.AllowsFileChoosing=false
		    p.AllowsEditing=true
		    p.AllowsVideoCapture=true
		    p.ShowEffects=FALSE // disable if you run modal!
		    p.ShowRecentPicture=true
		    p.UpdateRecentPicture=true
		    p.InformationalText="Please take a picture"
		    
		    n=p.runModal
		    
		    if n=1 then // ok
		      
		      Imagewell2.Image=p.outputImage.CopyPictureWithMask
		      
		    end if
		    
		  #elseif TargetWin32 then
		    
		    dim tw as new EZTwain
		    
		    if tw.SelectSource then
		      
		      do
		      loop until tw.AcquireNative
		      
		      if tw.pic<>nil then
		        
		        Imagewell2.Image=tw.pic
		        
		        do
		        loop until Imagewell2.ExportJPG
		        
		        Imagewell2.Image=Imagewell2.Image.ScaleMBS(ImageWell2.width,ImageWell2.height,true)
		        
		      end
		      
		    else
		      MsgBox tw.lastError
		    end
		    
		  #endif
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events BrowseDigVersion
	#tag Event
		Sub Action()
		  dim f as folderitem
		  
		  f=GetOpenFolderItem(FileTypes1.SoundTypes.Extensions)
		  
		  if f<>nil then
		    if MySong=nil then MySong=New MusicDataObject
		    MySong.HiResFile=New Folderitem(f)
		    hirespath.text=f.absolutepath
		  end
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events BrowseListenVersion
	#tag Event
		Sub Action()
		  dim f as folderitem
		  
		  f=GetOpenFolderItem(FileTypes1.SoundTypes.Extensions)
		  
		  if f<>nil then
		    if MySong=nil then MySong=New MusicDataObject
		    MySong.LoResFile=New Folderitem(f)
		    lorespath.text=f.absolutepath
		  end
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events ValikoimaPM
	#tag Event
		Sub Open()
		  if mydb<>nil then
		    
		    dim rs as recordset
		    rs=mydb.SQLSelect("SELECT * FROM "+app.mprefs.getstring("dbschema")+".catalog ORDER BY rowid")
		    if rs<>nil then
		      while not rs.eof
		        me.addrow DefineEncoding(rs.field("value"),Encodings.UTF8)
		        me.rowtag(me.listcount-1)=rs.field("rowid").Integervalue
		        rs.movenext
		      wend
		    end
		  end
		End Sub
	#tag EndEvent
	#tag Event
		Sub Change()
		  
		  if MySong<>nil then MySong.CATEGORYID=me.listindex
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events BrowseAttachment
	#tag Event
		Sub Action()
		  dim f as folderitem
		  
		  f=GetOpenFolderItem("")
		  
		  if f<>nil then
		    if MySong=nil then MySong=New MusicDataObject
		    MySong.Attachment=New Folderitem(f)
		    docpath.text=f.absolutepath
		  end
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events IMG1Rotate
	#tag Event
		Sub Action()
		  if Imagewell1.Image<>nil then
		    Imagewell1.Image=Imagewell1.image.Rotate90MBS
		  end
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events IMG2Rotate
	#tag Event
		Sub Action()
		  if Imagewell2.image<>nil then
		    Imagewell2.Image=Imagewell2.image.Rotate90MBS
		  end
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events IMG1Despeckle
	#tag Event
		Sub Action()
		  if imagewell1.image<>nil then
		    if me.caption="Despeckle" then
		      
		      me.enabled=false
		      me.caption="Undo"
		      
		      const UndefinedFilter=0
		      const PointFilter=1
		      const BoxFilter=2
		      const TriangleFilter=3
		      const HermiteFilter=4
		      const HanningFilter=5
		      const HammingFilter=6
		      const BlackmanFilter=7
		      const GaussianFilter=8
		      const QuadraticFilter=9
		      const CubicFilter=10
		      const CatromFilter=11
		      const MitchellFilter=12
		      const LanczosFilter=13
		      const BesselFilter=14
		      const SincFilter=15
		      
		      dim image as new GMImageMBS
		      
		      origimage1=imagewell1.image
		      
		      image.read(IMG1File.absolutepath)
		      
		      if image<>nil then
		        
		        image.despeckle
		        
		        dim blob as new GMBlobMBS
		        
		        image.write blob
		        
		        dim b as BinaryStream
		        b=IMG1File.CreateBinaryFile("application/binary")
		        b.Write blob.CopyString
		        b.Close
		        
		        imagewell1.image=image.CopyPicture(0,0,image.columns, image.rows)
		        do
		        loop until Imagewell1.ExportJPG
		        Imagewell1.Image=Imagewell1.Image.ScaleMBS(ImageWell1.width,ImageWell1.height,true)
		        
		      end
		      
		      me.enabled=true
		      
		    else
		      
		      me.caption="Despeckle"
		      
		      if origimage1<>nil then
		        imagewell1.image=OrigImage1
		        do
		        loop until Imagewell1.ExportJPG
		        Imagewell1.Image=Imagewell1.Image.ScaleMBS(ImageWell1.width,ImageWell1.height,true)
		      end
		      
		    end
		  end
		  
		  
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events ImageWell2
	#tag Event
		Sub Open()
		  me.acceptPictureDrop
		  me.AcceptFileDrop("imagetypes")
		End Sub
	#tag EndEvent
	#tag Event
		Sub DropObject(obj As DragItem, action As Integer)
		  if obj<>nil then
		    if obj.PictureAvailable then
		      me.image=obj.picture
		    elseif obj.folderitemavailable then
		      me.image=obj.folderitem.openaspicture
		    end if
		  end
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events IMG2Despeckle
	#tag Event
		Sub Action()
		  if imagewell2.image<>nil then
		    if me.caption="Despeckle" then
		      
		      me.enabled=false
		      me.caption="Undo"
		      
		      const UndefinedFilter=0
		      const PointFilter=1
		      const BoxFilter=2
		      const TriangleFilter=3
		      const HermiteFilter=4
		      const HanningFilter=5
		      const HammingFilter=6
		      const BlackmanFilter=7
		      const GaussianFilter=8
		      const QuadraticFilter=9
		      const CubicFilter=10
		      const CatromFilter=11
		      const MitchellFilter=12
		      const LanczosFilter=13
		      const BesselFilter=14
		      const SincFilter=15
		      
		      dim image as new GMImageMBS
		      
		      origimage2=imagewell2.image
		      
		      image.read(IMG2File.absolutepath)
		      
		      if image<>nil then
		        
		        image.despeckle
		        
		        dim blob as new GMBlobMBS
		        
		        image.write blob
		        
		        dim b as BinaryStream
		        b=IMG2File.CreateBinaryFile("application/binary")
		        b.Write blob.CopyString
		        b.Close
		        
		        imagewell2.image=image.CopyPicture(0,0,image.columns, image.rows)
		        do
		        loop until Imagewell2.ExportJPG
		        Imagewell2.Image=Imagewell2.Image.ScaleMBS(ImageWell2.width,ImageWell2.height,true)
		        
		      end
		      
		      me.enabled=true
		      
		    else
		      
		      me.caption="Despeckle"
		      
		      if origimage2<>nil then
		        imagewell2.image=OrigImage2
		        do
		        loop until Imagewell2.ExportJPG
		        Imagewell2.Image=Imagewell2.Image.ScaleMBS(ImageWell2.width,ImageWell2.height,true)
		      end
		      
		    end
		  end
		  
		  
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events CancelButton
	#tag Event
		Sub Action()
		  close
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events tcButton
	#tag Event
		Sub Action()
		  for i as integer=0 to 14
		    
		    TF(i).text=trim(TitleCase(TF(i).text))
		    
		  next
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events ucButton
	#tag Event
		Sub Action()
		  for i as integer=0 to 14
		    
		    TF(i).text=trim(UpperCase(TF(i).text))
		    
		  next
		End Sub
	#tag EndEvent
#tag EndEvents
#tag Events ApplyButton
	#tag Event
		Sub Action()
		  if MySong<>nil then
		    
		    MySong.GENRESET=GetStyleString
		    
		    if not SaveBackToImportWin then
		      
		      do
		      loop until MySong.upload(IsUpdated)
		      
		    end
		    
		    if IsUpdated and SaveBackToMainWin then
		      
		      MainWin.TheSong=MySong
		      MainWin.UpdateView
		      IsUpdated=false
		      SaveBackToMainWin=false
		      
		    end
		    
		    if IsUpdated and SaveBackToImportWin then
		      
		      AlbumImportWin.songlist.rowtag(AlbumImportWin.songlist.listindex)=MySong
		      AlbumImportWin.RefreshView
		      
		      IsUpdated=false
		      SaveBackToImportWin=false
		      
		    end
		    
		  end
		  
		  MsgBox GetStyleString
		  
		  'close
		End Sub
	#tag EndEvent
#tag EndEvents
